f- Chapitre 5

library(propre.rpls)
#> Error in get(paste0(generic, ".", class), envir = get_method_env()) : 
#>   object 'type_sum.accel' not found

ggplot2::theme_set(gouvdown::theme_gouv(plot_title_size = 14, subtitle_size  = 12, base_size = 10, caption_size = 10))
theme_carto <- gouvdown::theme_gouv_map(plot_title_size = 20, subtitle_size = 16, base_size = 14, caption_size = 12)

indicateurs_rpls <- lire_rpls_exemple() 

indicateurs_rpls_ref <- indicateurs_rpls %>%
 dplyr::filter(Zone_ref)

creer_tableau_5_1

La fonction creer_tableau_5_1() produit le tableau suivant :

  • en lignes : les départements / région / France (lignes différentes selon si DOM ou métropole)
  • en colonnes :
    • nombre de logements loués au proposés à la location N
    • taux de vacance totale N
    • taux de vacance structurelle N (plus de 3 mois selon définition nationale)
    • taux de mobilité N.

Mettre le paramètre epci = TRUE si vous souhaitez les données des epci dans le tableau. Mettre le paramètre add_scroll = TRUE si vous souhaitez ajouter un scroll à votre tableau pour plus de lisibilité. (voir un exemple de rendu dans l’article b- Chapitre 1, fonction creer_tableau_1_1())

Compléter le paramètre titre si vous souhaitez modifier le titre par défaut. Pour insérer un saut de ligne à votre titre, ajouter la chaîne de caractère <br> à l’endroit du saut souhaité.

Compléter le paramètre note_de_lecture si vous souhaitez en ajouter une avant les sources.

Pour le titre et la note de lecture attention aux accents et à l’encodage.

creer_tableau_5_1(data = indicateurs_rpls_ref, annee = 2023, epci = TRUE)[["viz"]]
#> Joining with `by = join_by(TypeZone, Zone, CodeZone)`
Vacance et mobilité dans le parc locatif social
Vacance
Zone Nombre de logements loués ou proposés à la location au 01/01/2023 Taux de vacance totale au 01/01/2023 Taux de vacance structurelle au 01/01/2023 Taux de mobilité en 2022
France métropolitaine 4 772 523 2,4 % 1,3 % 8,1 %
France de province 3 499 757 2,6 % 1,4 % 8,8 %
Corse 14 700 2,0 % 0,9 % 6,8 %
Corse-du-Sud 6 530 2,9 % 1,3 % 7,1 %
Haute-Corse 8 170 1,2 % 0,5 % 6,7 %
CA de Bastia 5 159 1,3 % 0,4 % 5,7 %
CA du Pays Ajaccien 5 083 2,8 % 1,0 % 6,9 %
Source : SDES, RPLS au 1er janvier 2023

creer_carte_5_1

La fonction creer_carte_5_1() produit la carte représentant le taux de vacance structurelle par EPCI pour l’année N choisie.
Les bornes peuvent être choisies manuellement par l’utilisateur ( bornes ) ou définies par une méthode de discrétisation ( method ). Les méthodes disponibles sont celles proposées par cartography::getBreaks() : “sd”, “equal”, “quantile”, “fisher-jenks”, “q6”, “geom”, “arith”, “em” or “msd”. Voir la documentation du package {[cartography](https://cran.r-project.org/web/packages/cartography/index.html)}pour plus de détail.
L’argument inverse permet d’inverser la progression de la couleur (des couleurs chaudes vers froides ou inversement).

Compléter le paramètre titre si vous souhaitez modifier le titre par défaut. Pour insérer un saut de ligne à votre titre, ajouter la chaîne de caractère \n à l’endroit du saut souhaité.

Compléter le paramètre note_de_lecture si vous souhaitez en ajouter une avant les sources.

Pour le titre et la note de lecture attention aux accents et à l’encodage.


creer_carte_5_1(data = indicateurs_rpls, annee = 2023, carto = mapfactory::fond_carto("Corse"),
                bornes = NULL, inverse = FALSE, palette = "pal_gouv_o", theme = theme_carto)[["viz"]]

creer_carte_5_2

La fonction creer_carte_5_2() produit la carte représentant le taux de mobilité par EPCI pour l’année N choisie. Les bornes peuvent être choisies manuellement par l’utilisateur ( bornes ) ou définies par une méthode de discrétisation ( method ). Les méthodes disponibles sont celles proposées par cartography::getBreaks() : “sd”, “equal”, “quantile”, “fisher-jenks”,“q6”, “geom”, “arith”, “em” or “msd”. Voir la documentation du package {[cartography](https://cran.r-project.org/web/packages/cartography/index.html)}pour plus de détail.

L’argument inverse permet d’inverser la progression de la couleur (des couleurs chaudes vers froides ou inversement)

Compléter le paramètre titre si vous souhaitez modifier le titre par défaut. Pour insérer un saut de ligne à votre titre, ajouter la chaîne de caractère \n à l’endroit du saut souhaité.

Compléter le paramètre note_de_lecture si vous souhaitez en ajouter une avant les sources.

Pour le titre et la note de lecture attention aux accents et à l’encodage.


creer_carte_5_2(data = indicateurs_rpls, annee = 2023, carto = mapfactory::fond_carto("Corse"),
                bornes = NULL, theme = theme_carto)[["viz"]]